home *** CD-ROM | disk | FTP | other *** search
/ Clickx 115 / Clickx 115.iso / software / tools / windows / tails-i386-0.16.iso / live / filesystem.squashfs / usr / share / perl5 / GnuPG / HashInit.pm < prev    next >
Encoding:
Perl POD Document  |  2009-07-13  |  197 b   |  13 lines
  1. package GnuPG::HashInit;
  2. use Any::Moose 'Role';
  3.  
  4. sub hash_init {
  5.     my ($self, %args) = @_;
  6.     while ( my ( $method, $value ) = each %args ) {
  7.         $self->$method($value);
  8.     }
  9. }
  10.  
  11. 1;
  12. __END__
  13.